home *** CD-ROM | disk | FTP | other *** search
/ The Arsenal Files 8 / The Arsenal Files Collection #8 (Arsenal Computer) (1996).ISO / prg_basi / qbsvga.zip / REGTYPE.INC < prev    next >
Text File  |  1996-08-12  |  1KB  |  30 lines
  1. '
  2. '  This is an include file to be used with the QBSVGA routines.  Put the
  3. ' contents of this file at the very top of your program (in the MAIN
  4. ' routine--the TYPE ... END TYPE construct cannot be used in subroutines).
  5. '
  6. '  When you go to compile and link your finished program, link with
  7. ' QB.LIB--in addition to whatever libraries you would normally use.
  8. '
  9. DECLARE FUNCTION BIN$(N AS LONG)
  10. DECLARE FUNCTION BPOINT%(X,Y)
  11. DECLARE FUNCTION BPOS(ROW)
  12. DECLARE FUNCTION QRYMOUSE%()
  13. TYPE REGISTERS
  14. AX AS INTEGER
  15. BX AS INTEGER
  16. CX AS INTEGER
  17. DX AS INTEGER
  18. BP AS INTEGER
  19. SI AS INTEGER
  20. DI AS INTEGER
  21. FLAGS AS INTEGER
  22. DS AS INTEGER
  23. ES AS INTEGER
  24. END TYPE
  25. COMMON SHARED /REGS/INREGS AS REGISTERS,OUTREGS AS REGISTERS
  26. COMMON SHARED /DEFAULTS/ACPAGE,DEFLTC,VESSUP,HMAX,VMAX,BVCBL,BITPLANES,BITSPIXEL
  27. COMMON SHARED /VIEWPORT/VXL,VYL,VXR,VYR,VCOL,VBORD
  28. COMMON SHARED /MOUSE/MXMAX,MYMAX,MDX,MDY,MXMINC,MXMAXC,MYMINC,MYMAXC,BUTTONS
  29. DIM SHARED MCOLOR AS INTEGER,XMOUSE AS INTEGER,YMOUSE AS INTEGER
  30.